Imports Microsoft.VisualBasic

Public Class Factura
    Private m_factura As String
    Private m_numFactura As Integer
    Private m_descripcio As String
    Private m_dataInici As Date
    Private m_import As Double
    Private m_llista As New Generic.List(Of LiniaFactura)

    Public Property factura() As String
        Get
            Return m_factura
        End Get
        Set(ByVal value As String)
            m_factura = value
        End Set
    End Property

    Public Property numFactura() As Integer
        Get
            Return m_numFactura
        End Get
        Set(ByVal value As Integer)
            m_numFactura = value
        End Set
    End Property

    Public Property descripcio() As String
        Get
            Return m_descripcio
        End Get
        Set(ByVal value As String)
            m_descripcio = value
        End Set
    End Property

    Public Property dataInici() As Date
        Get
            Return m_dataInici
        End Get
        Set(ByVal value As Date)
            m_dataInici = value
        End Set
    End Property

    Public Property import() As Double
        Get
            Return m_import
        End Get
        Set(ByVal value As Double)
            m_import = value
        End Set
    End Property

    'PUNT 1 DE L'EXAMEN:
    Public Property LlistaFactura() As Generic.List(Of LiniaFactura)
        Get
            Return m_llista
        End Get
        Set(ByVal value As Generic.List(Of LiniaFactura))
            m_llista = value
        End Set
    End Property

End Class